


* Figure 3: Intermarriage with Greek natives


cd "/Users/eliemurard/Dropbox/WorldBank Refugee project/World Dev revision/replication/"
	
use census2001_marriedwomen.dta,clear 

	
	g 		category = 1 if refugee==1 
	replace category =2 if  other_immigrant==1 

	g STD=husb_nat
	collapse (mean) husb_nat (semean) STD , by(category ) 
	g max95= 	husb_nat  +1.96*STD
	g min95= 	husb_nat  -1.96*STD
	
	twoway  ( bar  husb_nat  cat  , barwidth(0.3) color(ebblue)   ) /// 
			(rcap max95  min95  cat, color(red)  ) ///
		 , legend(off)  ///
			 xlabel( 0.5 " "  1  "1923 Refugees"    2 `"  "Immigrants arrived"  "before 1950"  "'   2.5 " " ,  labsize(medlarge) notick ) ///
			 ytitle(" ") ylab(, angle(horizontal)) graphregion(color(white))  xtitle("") ylabel(0(.1)0.6)


	
	

	